unit DatPassageiro;

interface

type
  TDatPassageiro = class(TObject)
  private
    Fobservacao: string;
    Fbairro: string;
    FusuarioId: integer;
    Fid: string;
    Fnumero: integer;
    FpontoReferencia: string;
    Fnome: string;
    Fendereco: string;
    Ftelefone: string;
    procedure Setbairro(const Value: string);
    procedure Setendereco(const Value: string);
    procedure Setid(const Value: string);
    procedure Setnome(const Value: string);
    procedure Setnumero(const Value: integer);
    procedure Setobservacao(const Value: string);
    procedure SetpontoReferencia(const Value: string);
    procedure Settelefone(const Value: string);
    procedure SetusuarioId(const Value: integer);

  protected

  public
    function Getid(): integer;
    function Getnome(): string;
    function GetTelefones(): String;
    function GetEndereco(): string;
    function GetNumero(): integer;
    function GetBairro(): string;
    function GetPontoReferencia(): string;
    function GetObservacao(): string;
    property id: string read Fid write Setid;
    property nome: string read Fnome write Setnome;
    property telefone: string read Ftelefone write Settelefone;
    property endereco: string read Fendereco write Setendereco;
    property numero: integer read Fnumero write Setnumero;
    property bairro: string read Fbairro write Setbairro;
    property pontoReferencia: string read FpontoReferencia
      write SetpontoReferencia;
    property observacao: string read Fobservacao write Setobservacao;
    property usuarioId: integer read FusuarioId write SetusuarioId;
  end;

implementation

uses
  System.SysUtils;

{ TDatPassageiro }

function TDatPassageiro.GetBairro: string;
begin
  Result := Fbairro;
end;

function TDatPassageiro.GetEndereco: string;
begin
  Result := Fendereco;
end;

function TDatPassageiro.Getid: integer;
begin
  Result := strtoint(Fid);
end;

function TDatPassageiro.Getnome: string;
begin
  Result := Fnome;
end;

function TDatPassageiro.GetNumero: integer;
begin
  Result := Fnumero;
end;

function TDatPassageiro.GetObservacao: string;
begin
  Result := Fobservacao;
end;

function TDatPassageiro.GetPontoReferencia: string;
begin
  Result := FpontoReferencia;
end;

function TDatPassageiro.GetTelefones: String;
begin
  Result := Ftelefone;
end;

procedure TDatPassageiro.Setbairro(const Value: string);
begin
  Fbairro := Value;
end;

procedure TDatPassageiro.Setendereco(const Value: string);
begin
  Fendereco := Value;
end;

procedure TDatPassageiro.Setid(const Value: string);
begin
  Fid := Value;
end;

procedure TDatPassageiro.Setnome(const Value: string);
begin
  Fnome := Value;
end;

procedure TDatPassageiro.Setnumero(const Value: integer);
begin
  Fnumero := Value;
end;

procedure TDatPassageiro.Setobservacao(const Value: string);
begin
  Fobservacao := Value;
end;

procedure TDatPassageiro.SetpontoReferencia(const Value: string);
begin
  FpontoReferencia := Value;
end;

procedure TDatPassageiro.Settelefone(const Value: string);
begin
  Ftelefone := Value;
end;

procedure TDatPassageiro.SetusuarioId(const Value: integer);
begin
  FusuarioId := Value;
end;

end.
